home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Magazin: Amiga-CD 1996 May & June
/
Amiga-CD 1996 #5-6.iso
/
pd-disketten
/
dms-gepackt
/
2_96
/
apd-2-96-2.dms
/
apd-2-96-2.adf
/
E-DEVeloper
/
Install
/
Install_E-DEV_english
< prev
next >
Wrap
Text File
|
1995-12-01
|
4KB
|
177 lines
;
; $PROJECT: E-DEVeloper Version 1.0pd
;
; (C) Copyright 1995 Grundler Mathias. All Rights Reserved.
;
(complete 0)
(set #WrongKickStart "\nTo use the E-DEVeloper you must\nhave Kick 2.04 or higher!\n")
(if (< (/ (getversion) 65536) 37)
(abort #WrongKickStart)
)
(message
"\n\n\n\n"
"Welcome to the \n\nE-DEVeloper 1.0pd\n\nInstallation-Script V1.0\n"
)
(set edev-dest
(askdir (prompt "Please choose a destination, a drawer named "E-DEVeloper" is automatically generated")
(help @askdir-help)
(default "ebin:")
)
)
(run (cat "c:makedir "edev-dest"E-DEVeloper"))
(complete 15)
; For Installation from a Diskdrive to a Harddisk delete the lines between here...
;---------->8---------->8---------->8---------->8---------->8---------->8
;
(copyfiles
(prompt "\nCopying the Drawer-Icon \n")
(help @copyfiles-help)
(source "//E-DEVeloper.info")
(dest edev-dest)
(files)
)
;
;---------->8---------->8---------->8---------->8---------->8---------->8
; and here...
(set edev-dest (tackon edev-dest "E-DEVeloper"))
(complete 27)
(copyfiles
(prompt "\nCopying the E-DEVeloper Mainprogramm...\n")
(help @copyfiles-help)
(source "/E-DEV")
(dest edev-dest)
(files)
)
(complete 35)
(if(askbool
(prompt "\n Would You like to install the\n E-DEVeoper-Icon to \n"edev-dest"\n")
(help @askbool_help)
(default 1))
(copyfiles
(prompt "\nCopying the E-DEVeloper-Icon\n")
(help @copyfiles-help)
(source "/E-DEV.info")
(dest edev-dest)
(files)
(infos)
)
)
(complete 50)
(if(askbool
(prompt "\n Would You like to install the \n E-DEVeloper-Tools to\n "edev-dest"\n ")
(help @askbool_help)
(default 1))
((copyfiles
(prompt "\nCopying the E-DEVeloper-Tools...\n")
(help @copyfiles-help)
(source "/TOOLS/showprojekt_E")
(dest edev-dest)
(files)
(infos)
)
(copyfiles
(prompt "\nCopying the E-DEVeloper-Tools...\n")
(help @copyfiles-help)
(source "/TOOLS/list2txt_e")
(dest edev-dest)
(files)
(infos)
)
(copyfiles
(prompt "\nCopying the E-DEVeloper-Tools...\n")
(help @copyfiles-help)
(source "/TOOLS/projekt2list")
(dest edev-dest)
(files)
(infos)
))
)
(complete 65)
(if(askbool
(prompt "\nWould You like to install the DEMO-Rexx-Scripts??\n")
(help @askbool_help)
(default 1))
((copyfiles
(prompt "\nCopying Rexx-Scripts...\n")
(help @copyfiles-help)
(source "/REXX/")
(dest "rexx:")
(files)
(infos)
(all)
))
)
(complete 70)
(copyfiles
(prompt "\nCopying the E-DEVeloper App-Icon...\n")
(help @copyfiles-help)
(source "/icons/e-dev.info")
(dest "sys:prefs/presets/")
(files)
)
(complete 75)
(if(askbool
(prompt "\n Would You like to Install the Documentation??\n")
(help @askbool_help)
(default 1))
(
(set edevdoc-dest
(askdir (prompt "Please choose the destination ffor the Documentation")
(help @askdir-help)
(default "edocs:")
)
)
(copyfiles
(prompt "\nCopying the Documentation...\n")
(help @copyfiles-help)
(source "/DOKS/E-DEV_english.guide")
(dest edevdoc-dest)
(files)
(infos))
)
)
(complete 99)
(run (cat "c:makedir "edev-dest"/Projekte"))
(startup "EDEV"
(prompt " \n\nIt`s needet to add \n\n a Assign to the \n\n s:User-StartUP \n\n i do this for you...\n\n")
(help @startup-help)
(command "if exists "edev-dest"/Projekte \n" )
(command " assign eprojects: "edev-dest"/Projekte \n" )
(command "endif" )
)
(set @default-dest edev-dest)
(complete 100)
(exit "\n\nYou should reboot before starting the E-DEVeloper\n\n or Using any Projects...\n\n")